object frmRastr_Carga: TfrmRastr_Carga
  Left = -4
  Top = -4
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = 'Rastreamento da Carga'
  ClientHeight = 581
  ClientWidth = 800
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = [fsBold]
  OldCreateOrder = False
  Position = poScreenCenter
  WindowState = wsMaximized
  OnActivate = FormActivate
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object DBGrid1: TDBGrid
    Left = 424
    Top = 28
    Width = 373
    Height = 513
    DataSource = DTSRC
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -8
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    Options = [dgTitles, dgIndicator, dgColumnResize, dgRowLines, dgMultiSelect]
    ParentFont = False
    TabOrder = 5
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -8
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = [fsBold]
    Columns = <
      item
        Alignment = taCenter
        Expanded = False
        FieldName = 'Carga'
        Title.Alignment = taCenter
        Width = 51
        Visible = True
      end
      item
        Alignment = taCenter
        Expanded = False
        FieldName = 'Ordem'
        Title.Alignment = taCenter
        Title.Caption = 'O.Ent'
        Width = 38
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Produto'
        Width = 78
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Descricao'
        Title.Caption = ' '
        Visible = True
      end
      item
        Alignment = taRightJustify
        Expanded = False
        FieldName = 'Qtde'
        Title.Alignment = taRightJustify
        Visible = True
      end
      item
        Alignment = taCenter
        Expanded = False
        FieldName = 'Pedido'
        Title.Alignment = taCenter
        Width = 65
        Visible = True
      end
      item
        Alignment = taCenter
        Expanded = False
        FieldName = 'Entidade'
        Title.Alignment = taCenter
        Visible = True
      end
      item
        Alignment = taCenter
        Expanded = False
        FieldName = 'NF'
        Title.Alignment = taCenter
        Visible = True
      end
      item
        Alignment = taCenter
        Expanded = False
        FieldName = 'Sr'
        Title.Alignment = taCenter
        Visible = True
      end>
  end
  object rgCarga: TGroupBox
    Left = 0
    Top = 52
    Width = 423
    Height = 193
    Caption = 'Dados da Carga:  '
    Color = 14081504
    ParentColor = False
    TabOrder = 0
    object Label1: TLabel
      Left = 24
      Top = 37
      Width = 82
      Height = 13
      Caption = 'Data Cadastro'
      FocusControl = DBEdit1
    end
    object Label3: TLabel
      Left = 77
      Top = 134
      Width = 29
      Height = 13
      Caption = 'Peso'
      FocusControl = DBEdit3
    end
    object Label2: TLabel
      Left = 53
      Top = 95
      Width = 53
      Height = 13
      Caption = 'Motorista'
      FocusControl = DBEdit2
    end
    object Label4: TLabel
      Left = 19
      Top = 76
      Width = 87
      Height = 13
      Caption = 'Transportadora'
      FocusControl = DBEdit4
    end
    object Label5: TLabel
      Left = 8
      Top = 56
      Width = 98
      Height = 13
      Caption = 'Previs'#227'o Entrega'
      FocusControl = DBEdit5
    end
    object Label6: TLabel
      Left = 80
      Top = 154
      Width = 26
      Height = 13
      Caption = 'Lote'
      FocusControl = DBEdit6
    end
    object Label7: TLabel
      Left = 64
      Top = 115
      Width = 42
      Height = 13
      Caption = 'Volume'
      FocusControl = DBEdit7
    end
    object Label8: TLabel
      Left = 37
      Top = 173
      Width = 69
      Height = 13
      Caption = 'Observa'#231#227'o'
      FocusControl = DBEdit8
    end
    object Label9: TLabel
      Left = 55
      Top = 17
      Width = 51
      Height = 13
      Caption = 'Entidade'
      FocusControl = DBEdit1
    end
    object edEntidade: TLabel
      Left = 111
      Top = 17
      Width = 51
      Height = 13
      Caption = 'Entidade'
      FocusControl = DBEdit1
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clNavy
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object DBEdit1: TDBEdit
      Left = 111
      Top = 37
      Width = 130
      Height = 17
      TabStop = False
      BorderStyle = bsNone
      CharCase = ecUpperCase
      Color = clBtnFace
      DataField = 'CAR_DATA'
      DataSource = dsCarga
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clNavy
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      ReadOnly = True
      TabOrder = 0
    end
    object DBEdit3: TDBEdit
      Left = 111
      Top = 134
      Width = 74
      Height = 17
      TabStop = False
      BorderStyle = bsNone
      CharCase = ecUpperCase
      Color = clBtnFace
      DataField = 'CAR_PESO'
      DataSource = dsCarga
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clNavy
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      ReadOnly = True
      TabOrder = 1
    end
    object DBEdit2: TDBEdit
      Left = 111
      Top = 95
      Width = 284
      Height = 17
      TabStop = False
      BorderStyle = bsNone
      CharCase = ecUpperCase
      Color = clBtnFace
      DataField = 'CAR_MOTORISTA'
      DataSource = dsCarga
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clNavy
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      ReadOnly = True
      TabOrder = 2
    end
    object DBEdit4: TDBEdit
      Left = 111
      Top = 76
      Width = 284
      Height = 17
      TabStop = False
      BorderStyle = bsNone
      CharCase = ecUpperCase
      Color = clBtnFace
      DataField = 'TRAN_NOME'
      DataSource = dsCarga
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clNavy
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      ReadOnly = True
      TabOrder = 3
    end
    object DBEdit5: TDBEdit
      Left = 111
      Top = 56
      Width = 130
      Height = 17
      TabStop = False
      BorderStyle = bsNone
      CharCase = ecUpperCase
      Color = clBtnFace
      DataField = 'CAR_DATAFEC'
      DataSource = dsCarga
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clNavy
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      ReadOnly = True
      TabOrder = 4
    end
    object DBEdit6: TDBEdit
      Left = 111
      Top = 154
      Width = 25
      Height = 17
      TabStop = False
      BorderStyle = bsNone
      CharCase = ecUpperCase
      Color = clBtnFace
      DataField = 'CAR_NUMLOTE'
      DataSource = dsCarga
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clNavy
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      ReadOnly = True
      TabOrder = 5
    end
    object DBEdit7: TDBEdit
      Left = 111
      Top = 115
      Width = 74
      Height = 17
      TabStop = False
      BorderStyle = bsNone
      CharCase = ecUpperCase
      Color = clBtnFace
      DataField = 'CAR_VOLUME'
      DataSource = dsCarga
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clNavy
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      ReadOnly = True
      TabOrder = 6
    end
    object DBEdit8: TDBEdit
      Left = 111
      Top = 173
      Width = 284
      Height = 17
      TabStop = False
      BorderStyle = bsNone
      Color = clBtnFace
      DataField = 'CAR_OBS1'
      DataSource = dsCarga
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clNavy
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      ReadOnly = True
      TabOrder = 7
    end
  end
  object sg_carga: TStringGrid
    Left = 0
    Top = 279
    Width = 422
    Height = 262
    Color = clWhite
    DefaultRowHeight = 15
    FixedCols = 0
    RowCount = 2
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goRowSelect]
    ParentFont = False
    TabOrder = 1
    OnDrawCell = sg_cargaDrawCell
    OnSelectCell = sg_cargaSelectCell
    ColWidths = (
      56
      32
      31
      196
      77)
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 423
    Height = 53
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 2
    object edBarra: TEdit
      Left = 6
      Top = 8
      Width = 348
      Height = 37
      BiDiMode = bdLeftToRight
      Color = 16056319
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -24
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      MaxLength = 25
      ParentBiDiMode = False
      ParentFont = False
      TabOrder = 0
      Text = '00795000001001090.002.006'
      OnChange = edBarraChange
    end
    object Edit1: TEdit
      Left = 354
      Top = 8
      Width = 62
      Height = 37
      BiDiMode = bdLeftToRight
      Color = 16056319
      Enabled = False
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -24
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      MaxLength = 25
      ParentBiDiMode = False
      ParentFont = False
      TabOrder = 1
      Text = '0000'
      OnChange = edBarraChange
    end
  end
  object Panel2: TPanel
    Left = 0
    Top = 543
    Width = 800
    Height = 38
    Align = alBottom
    TabOrder = 3
    object Shape1: TShape
      Left = 285
      Top = 8
      Width = 133
      Height = 22
      Brush.Color = clLime
    end
    object Label10: TLabel
      Left = 297
      Top = 12
      Width = 107
      Height = 13
      Caption = 'Produto Rastreado'
      Transparent = True
    end
    object Bevel1: TBevel
      Left = 422
      Top = 0
      Width = 2
      Height = 38
    end
    object BitBtn1: TBitBtn
      Left = 6
      Top = 6
      Width = 125
      Height = 25
      Caption = '&OK'
      TabOrder = 0
      OnClick = BitBtn1Click
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
        555555555555555555555555555555555555555555FF55555555555559055555
        55555555577FF5555555555599905555555555557777F5555555555599905555
        555555557777FF5555555559999905555555555777777F555555559999990555
        5555557777777FF5555557990599905555555777757777F55555790555599055
        55557775555777FF5555555555599905555555555557777F5555555555559905
        555555555555777FF5555555555559905555555555555777FF55555555555579
        05555555555555777FF5555555555557905555555555555777FF555555555555
        5990555555555555577755555555555555555555555555555555}
      NumGlyphs = 2
    end
    object btnlistagem: TBitBtn
      Left = 548
      Top = 6
      Width = 150
      Height = 25
      Caption = '&Imprimir'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 1
      OnClick = btnlistagemClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
        0003377777777777777308888888888888807F33333333333337088888888888
        88807FFFFFFFFFFFFFF7000000000000000077777777777777770F8F8F8F8F8F
        8F807F333333333333F708F8F8F8F8F8F9F07F333333333337370F8F8F8F8F8F
        8F807FFFFFFFFFFFFFF7000000000000000077777777777777773330FFFFFFFF
        03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
        03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
        33333337F3F37F3733333330F08F0F0333333337F7337F7333333330FFFF0033
        33333337FFFF7733333333300000033333333337777773333333}
      NumGlyphs = 2
    end
  end
  object Panel3: TPanel
    Left = 0
    Top = 244
    Width = 422
    Height = 34
    Color = 16056319
    TabOrder = 4
    object lblNota: TLabel
      Left = 124
      Top = 4
      Width = 7
      Height = 24
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -19
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object lblSerie: TLabel
      Left = 276
      Top = 4
      Width = 7
      Height = 24
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -19
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label12: TLabel
      Left = 8
      Top = 4
      Width = 111
      Height = 24
      Caption = 'Nota Fiscal:'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -19
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label13: TLabel
      Left = 240
      Top = 4
      Width = 33
      Height = 24
      Caption = 'Sr.:'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -19
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object lblData: TLabel
      Left = 512
      Top = 11
      Width = 6
      Height = 20
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
  end
  object Panel4: TPanel
    Left = 424
    Top = 0
    Width = 373
    Height = 27
    BevelInner = bvRaised
    BevelOuter = bvLowered
    Caption = 'ITENS RASTREADOS'
    Color = 14081504
    TabOrder = 6
  end
  object qrCarga: TQuery
    DatabaseName = 'industrial'
    SQL.Strings = (
      'Select c.*,Tran_nome from Carga C,  Transportadora T'
      'where Car_Numero = '#39'000001'#39
      'and t.tran_codigo = c.tran_codigo')
    Left = 360
    Top = 60
    object qrCargaCAR_NUMERO: TStringField
      FieldName = 'CAR_NUMERO'
      Origin = 'INDUSTRIAL.CARGA.CAR_NUMERO'
      Size = 6
    end
    object qrCargaTRAN_CODIGO: TStringField
      FieldName = 'TRAN_CODIGO'
      Origin = 'INDUSTRIAL.CARGA.TRAN_CODIGO'
      Size = 3
    end
    object qrCargaCAR_DATA: TDateTimeField
      FieldName = 'CAR_DATA'
      Origin = 'INDUSTRIAL.CARGA.CAR_DATA'
      EditMask = '!99/99/0000;1;_'
    end
    object qrCargaCAR_NUMLOTE: TStringField
      FieldName = 'CAR_NUMLOTE'
      Origin = 'INDUSTRIAL.CARGA.CAR_NUMLOTE'
      Size = 3
    end
    object qrCargaCAR_OBS1: TStringField
      FieldName = 'CAR_OBS1'
      Origin = 'INDUSTRIAL.CARGA.CAR_OBS1'
      Size = 40
    end
    object qrCargaCAR_OBS2: TStringField
      FieldName = 'CAR_OBS2'
      Origin = 'INDUSTRIAL.CARGA.CAR_OBS2'
      Size = 40
    end
    object qrCargaCAR_OBS3: TStringField
      FieldName = 'CAR_OBS3'
      Origin = 'INDUSTRIAL.CARGA.CAR_OBS3'
      Size = 40
    end
    object qrCargaCAR_FECHADA: TStringField
      FieldName = 'CAR_FECHADA'
      Origin = 'INDUSTRIAL.CARGA.CAR_FECHADA'
      Size = 1
    end
    object qrCargaCAR_RETIDA: TStringField
      FieldName = 'CAR_RETIDA'
      Origin = 'INDUSTRIAL.CARGA.CAR_RETIDA'
      Size = 1
    end
    object qrCargaCAR_PESO: TFloatField
      FieldName = 'CAR_PESO'
      Origin = 'INDUSTRIAL.CARGA.CAR_PESO'
    end
    object qrCargaCAR_VOLUME: TFloatField
      FieldName = 'CAR_VOLUME'
      Origin = 'INDUSTRIAL.CARGA.CAR_VOLUME'
    end
    object qrCargaCAR_DATAFEC: TDateTimeField
      FieldName = 'CAR_DATAFEC'
      Origin = 'INDUSTRIAL.CARGA.CAR_DATAFEC'
    end
    object qrCargaCAR_DATAPREV: TDateTimeField
      FieldName = 'CAR_DATAPREV'
      Origin = 'INDUSTRIAL.CARGA.CAR_DATAPREV'
      EditMask = '!99/99/0000;1;_'
    end
    object qrCargaCAR_PESOBRU: TFloatField
      FieldName = 'CAR_PESOBRU'
      Origin = 'INDUSTRIAL.CARGA.CAR_PESOBRU'
    end
    object qrCargaCAR_CAUSARET: TStringField
      FieldName = 'CAR_CAUSARET'
      Origin = 'INDUSTRIAL.CARGA.CAR_CAUSARET'
      Size = 60
    end
    object qrCargaCAR_FATURADA: TStringField
      FieldName = 'CAR_FATURADA'
      Origin = 'INDUSTRIAL.CARGA.CAR_FATURADA'
      Size = 1
    end
    object qrCargaCAR_DATAFAT: TDateTimeField
      FieldName = 'CAR_DATAFAT'
      Origin = 'INDUSTRIAL.CARGA.CAR_DATAFAT'
    end
    object qrCargaCAR_PLACA: TStringField
      FieldName = 'CAR_PLACA'
      Origin = 'INDUSTRIAL.CARGA.CAR_PLACA'
      Size = 8
    end
    object qrCargaCAR_UFPLACA: TStringField
      FieldName = 'CAR_UFPLACA'
      Origin = 'INDUSTRIAL.CARGA.CAR_UFPLACA'
      Size = 2
    end
    object qrCargaCAR_MOTORISTA: TStringField
      FieldName = 'CAR_MOTORISTA'
      Origin = 'INDUSTRIAL.CARGA.CAR_MOTORISTA'
      Size = 40
    end
    object qrCargaTRAN_NOME: TStringField
      FieldName = 'TRAN_NOME'
      Origin = 'INDUSTRIAL.TRANSPORTADORA.TRAN_NOME'
      Size = 40
    end
  end
  object dsCarga: TDataSource
    DataSet = qrCarga
    Left = 388
    Top = 60
  end
  object cds: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 736
    Top = 68
    object cdsProduto: TStringField
      FieldName = 'Produto'
      Size = 11
    end
    object cdsDescricao: TStringField
      FieldName = 'Descricao'
      Size = 30
    end
    object cdsPedido: TStringField
      FieldName = 'Pedido'
      Size = 9
    end
    object cdsEntidade: TStringField
      FieldName = 'Entidade'
      Size = 5
    end
    object cdsCarga: TStringField
      FieldName = 'Carga'
      Size = 6
    end
    object cdsOrdem: TStringField
      FieldName = 'Ordem'
      Size = 3
    end
    object cdsNF: TStringField
      FieldName = 'NF'
      Size = 9
    end
    object cdsSr: TStringField
      FieldName = 'Sr'
      Size = 3
    end
    object cdsQtde: TStringField
      FieldName = 'Qtde'
      Size = 14
    end
  end
  object DTSRC: TDataSource
    DataSet = cds
    Left = 764
    Top = 68
  end
  object RDP: TRDprint
    ImpressoraPersonalizada.NomeImpressora = 'Modelo Personalizado - (Epson)'
    ImpressoraPersonalizada.AvancaOitavos = '27 48'
    ImpressoraPersonalizada.AvancaSextos = '27 50'
    ImpressoraPersonalizada.SaltoPagina = '12'
    ImpressoraPersonalizada.TamanhoPagina = '27 67 66'
    ImpressoraPersonalizada.Negrito = '27 69'
    ImpressoraPersonalizada.Italico = '27 52'
    ImpressoraPersonalizada.Sublinhado = '27 45 49'
    ImpressoraPersonalizada.Expandido = '27 14'
    ImpressoraPersonalizada.Normal10 = '18 27 80'
    ImpressoraPersonalizada.Comprimir12 = '18 27 77'
    ImpressoraPersonalizada.Comprimir17 = '27 80 27 15'
    ImpressoraPersonalizada.Comprimir20 = '27 77 27 15'
    ImpressoraPersonalizada.Reset = '27 80 18 20 27 53 27 70 27 45 48'
    ImpressoraPersonalizada.Inicializar = '27 64'
    OpcoesPreview.PaginaZebrada = False
    OpcoesPreview.Remalina = False
    OpcoesPreview.CaptionPreview = 'Automa'#231#227'o Industrial (Visualiza'#231#227'o)'
    OpcoesPreview.PreviewZoom = 100
    OpcoesPreview.CorPapelPreview = clWhite
    OpcoesPreview.CorLetraPreview = clBlack
    OpcoesPreview.Preview = True
    OpcoesPreview.BotaoSetup = Ativo
    OpcoesPreview.BotaoImprimir = Ativo
    OpcoesPreview.BotaoGravar = Ativo
    OpcoesPreview.BotaoLer = Ativo
    OpcoesPreview.BotaoProcurar = Ativo
    Margens.Left = 10
    Margens.Right = 10
    Margens.Top = 10
    Margens.Bottom = 10
    Autor = Deltress
    RegistroUsuario.NomeRegistro = 'Criterius Software Ltda'
    RegistroUsuario.SerieProduto = 'SITE-0206/00125'
    RegistroUsuario.AutorizacaoKey = 'NFJL-3806-CXWK-8270-LEQC'
    About = 'RDprint 4.0a - Registrado'
    Acentuacao = Transliterate
    CaptionSetup = 'Rdprint Setup'
    TitulodoRelatorio = 'Gerado por RDprint'
    UsaGerenciadorImpr = False
    CorForm = clBtnFace
    CorFonte = clBlack
    Impressora = Epson
    Mapeamento.Strings = (
      '//--- Grafico Compativel com Windows/USB ---//'
      '//'
      'GRAFICO=GRAFICO'
      'HP=GRAFICO'
      'DESKJET=GRAFICO'
      'LASERJET=GRAFICO'
      'INKJET=GRAFICO'
      'STYLUS=GRAFICO'
      'EPL=GRAFICO'
      'USB=GRAFICO'
      '//'
      '//--- Linha Epson Matricial 9 e 24 agulhas ---//'
      '//'
      'EPSON=EPSON'
      'GENERICO=EPSON'
      'LX-300=EPSON'
      'LX-810=EPSON'
      'FX-2170=EPSON'
      'FX-1170=EPSON'
      'LQ-1170=EPSON'
      'LQ-2170=EPSON'
      'OKIDATA=EPSON'
      '//'
      '//--- Rima e Emilia ---//'
      '//'
      'RIMA=RIMA'
      'EMILIA=RIMA'
      '//'
      '//--- Linha HP/Xerox padr'#227'o PCL ---//'
      '//'
      'PCL=HP'
      '//'
      '//--- Impressoras 40 Colunas ---//'
      '//'
      'DARUMA=BOBINA'
      'SIGTRON=BOBINA'
      'SWEDA=BOBINA'
      'BEMATECH=BOBINA')
    PortaComunicacao = 'LPT1'
    MostrarProgresso = True
    TamanhoQteLinhas = 66
    TamanhoQteColunas = 80
    TamanhoQteLPP = Seis
    NumerodeCopias = 1
    FonteTamanhoPadrao = S10cpp
    FonteEstiloPadrao = []
    Orientacao = poPortrait
    OnNewPage = RDPNewPage
    Left = 513
    Top = 545
  end
end
